USE [BeProd_JCLR]
GO

/****** Object:  View [dbo].[View_ListaArtigoEncomendado_Eticadata]    Script Date: 23/02/2022 23:38:34 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

ALTER VIEW [dbo].[View_ListaArtigoEncomendado_Eticadata]
AS
SELECT DISTINCT 
                         dbo.M01_SSCC_Cab.strIA_00_SSCC, dbo.M01_SSCC_Cab.strArtigoCodigo, dbo.M01_SSCC_Cab.StrPeça, dbo.M01_SSCC_Cab.StrTamanho, dbo.M01_SSCC_Cab.fltQtdActual AS fltQuantidadeEstampada, 
                         dbo.M01_SSCC_Cab.strUserRespExpedicao, dbo.M01_SSCC_Cab.IntIdExpedicao, dbo.M01_SSCC_Cab.StrDocumentoERP, dbo.M11_MovimentosRecepcaoPecas_Cab.StrExercicio, 
                         dbo.M11_MovimentosRecepcaoPecas_Cab.StrNumDocCLI, dbo.T99_0204_SubArtTam.StrCodDesenho, dbo.M01_SSCC_Cab.StrDocEntradaERP, Emp_JOCOL.dbo.Mov_Encomenda_Lin.strCodArtigo AS CodArtigoERP, 
                         dbo.T99_0204_SubArtTam.StrCodArtigoCliente, Emp_JOCOL.dbo.Mov_Encomenda_Cab.intCodEntidade AS IntCodCliente, dbo.T99_0204_SubArtTam.StrCodTpPeca, dbo.T02_SubArtigos.StrCodCor, 
                         Emp_JOCOL.dbo.Mov_Encomenda_Cab.strNumRequisicao, dbo.M01_SSCC_Cab.strPartidaCliente
FROM            Emp_JOCOL.dbo.Mov_Encomenda_Lin INNER JOIN
                         Emp_JOCOL.dbo.Mov_Encomenda_Cab ON Emp_JOCOL.dbo.Mov_Encomenda_Lin.strCodSeccao = Emp_JOCOL.dbo.Mov_Encomenda_Cab.strCodSeccao AND 
                         Emp_JOCOL.dbo.Mov_Encomenda_Lin.strAbrevTpDoc = Emp_JOCOL.dbo.Mov_Encomenda_Cab.strAbrevTpDoc AND 
                         Emp_JOCOL.dbo.Mov_Encomenda_Lin.strCodExercicio = Emp_JOCOL.dbo.Mov_Encomenda_Cab.strCodExercicio AND 
                         Emp_JOCOL.dbo.Mov_Encomenda_Lin.intNumero = Emp_JOCOL.dbo.Mov_Encomenda_Cab.intNumero INNER JOIN
                         dbo.M01_SSCC_Cab INNER JOIN
                         dbo.M11_MovimentosRecepcaoPecas_Cab ON dbo.M01_SSCC_Cab.IntIdEntrada = dbo.M11_MovimentosRecepcaoPecas_Cab.IntID INNER JOIN
                         dbo.T99_0204_SubArtTam ON dbo.M01_SSCC_Cab.strArtigoCodigo = dbo.T99_0204_SubArtTam.StrCodArtigo ON 
                         Emp_JOCOL.dbo.Mov_Encomenda_Cab.strCodExercicio = dbo.M11_MovimentosRecepcaoPecas_Cab.StrExercicio AND Emp_JOCOL.dbo.Mov_Encomenda_Cab.strNumero = dbo.M01_SSCC_Cab.StrDocEntradaERP INNER JOIN
                         dbo.T02_SubArtigos ON dbo.M01_SSCC_Cab.strArtigoCodigo = dbo.T02_SubArtigos.StrCodArtigoPai
GROUP BY dbo.M01_SSCC_Cab.strIA_00_SSCC, dbo.M01_SSCC_Cab.strArtigoCodigo, dbo.M01_SSCC_Cab.StrPeça, dbo.M01_SSCC_Cab.StrTamanho, dbo.M01_SSCC_Cab.fltQtdActual, dbo.M01_SSCC_Cab.strUserRespExpedicao, 
                         dbo.M01_SSCC_Cab.IntIdExpedicao, dbo.M01_SSCC_Cab.StrDocumentoERP, dbo.M11_MovimentosRecepcaoPecas_Cab.StrExercicio, dbo.M11_MovimentosRecepcaoPecas_Cab.StrNumDocCLI, 
                         dbo.T99_0204_SubArtTam.StrCodDesenho, dbo.M11_MovimentosRecepcaoPecas_Cab.BitEliminado, dbo.M01_SSCC_Cab.bitEliminado, dbo.T99_0204_SubArtTam.StrCodDesenho + RIGHT(dbo.M01_SSCC_Cab.StrPeça, 8), 
                         dbo.M01_SSCC_Cab.StrDocEntradaERP, dbo.M11_MovimentosRecepcaoPecas_Cab.IntCodCliente, Emp_JOCOL.dbo.Mov_Encomenda_Lin.strCodArtigo, RIGHT(dbo.M01_SSCC_Cab.StrPeça, 8), 
                         dbo.T99_0204_SubArtTam.StrCodArtigoCliente, Emp_JOCOL.dbo.Mov_Encomenda_Cab.intCodEntidade, dbo.T99_0204_SubArtTam.StrCodTpPeca, dbo.T02_SubArtigos.StrCodCor, 
                         Emp_JOCOL.dbo.Mov_Encomenda_Cab.strNumRequisicao, dbo.T02_SubArtigos.StrCodArtigoFilho, dbo.M01_SSCC_Cab.strPartidaCliente
HAVING        (NOT (dbo.M01_SSCC_Cab.IntIdExpedicao IS NULL)) AND (dbo.M11_MovimentosRecepcaoPecas_Cab.BitEliminado IS NULL) AND (dbo.M01_SSCC_Cab.bitEliminado IS NULL) AND (RIGHT(dbo.M01_SSCC_Cab.StrPeça, 8) 
                         = RIGHT(Emp_JOCOL.dbo.Mov_Encomenda_Lin.strCodArtigo, 8)) AND (dbo.T99_0204_SubArtTam.StrCodDesenho = LEFT(Emp_JOCOL.dbo.Mov_Encomenda_Lin.strCodArtigo, 13)) AND 
                         (dbo.T02_SubArtigos.StrCodArtigoFilho = LEFT(dbo.M01_SSCC_Cab.StrPeça, 15))
GO

/****** Object:  View [dbo].[View_ListaArtigosExpedicao]    Script Date: 23/02/2022 23:39:08 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

ALTER VIEW [dbo].[View_ListaArtigosExpedicao]
AS
SELECT DISTINCT 
                         dbo.View_ListaArtigoEncomendado_Eticadata.IntCodCliente AS CodCliente, dbo.View_ListaArtigoEncomendado_Eticadata.CodArtigoERP AS Artigo, dbo.View_ListaArtigoEncomendado_Eticadata.StrTamanho, 
                         dbo.View_ListaArtigoEncomendado_Eticadata.fltQuantidadeEstampada AS FltQtdExpedida, dbo.View_ListaArtigoEncomendado_Eticadata.StrDocEntradaERP, dbo.View_ListaArtigoEncomendado_Eticadata.IntIdExpedicao, 
                         dbo.View_ListaArtigoEncomendado_Eticadata.StrDocumentoERP, dbo.View_ListaArtigoEncomendado_Eticadata.StrNumDocCLI, dbo.T03_Desenhos.IntIdArtigoCliente, 
                         RIGHT(LEFT(dbo.View_ListaArtigoEncomendado_Eticadata.CodArtigoERP, 15), 1) AS IdArtigo, dbo.View_ListaArtigoEncomendado_Eticadata.strIA_00_SSCC, Emp_JOCOL.dbo.Mov_Encomenda_Cab.strNumRequisicao, 
                         dbo.View_ListaArtigoEncomendado_Eticadata.StrCodCor, dbo.View_ListaArtigoEncomendado_Eticadata.strPartidaCliente
FROM            dbo.T03_Desenhos RIGHT OUTER JOIN
                         dbo.View_ListaArtigoEncomendado_Eticadata ON dbo.T03_Desenhos.StrCodDesenho = dbo.View_ListaArtigoEncomendado_Eticadata.StrCodDesenho AND 
                         dbo.T03_Desenhos.StrCodArtigoCliente = dbo.View_ListaArtigoEncomendado_Eticadata.StrCodArtigoCliente AND CONVERT(varchar, dbo.T03_Desenhos.IntIdArtigoCliente) 
                         = RIGHT(LEFT(dbo.View_ListaArtigoEncomendado_Eticadata.CodArtigoERP, 15), 1) LEFT OUTER JOIN
                         Emp_JOCOL.dbo.Mov_Encomenda_Lin INNER JOIN
                         Emp_JOCOL.dbo.Mov_Encomenda_Cab ON Emp_JOCOL.dbo.Mov_Encomenda_Lin.strCodSeccao = Emp_JOCOL.dbo.Mov_Encomenda_Cab.strCodSeccao AND 
                         Emp_JOCOL.dbo.Mov_Encomenda_Lin.strAbrevTpDoc = Emp_JOCOL.dbo.Mov_Encomenda_Cab.strAbrevTpDoc AND 
                         Emp_JOCOL.dbo.Mov_Encomenda_Lin.strCodExercicio = Emp_JOCOL.dbo.Mov_Encomenda_Cab.strCodExercicio AND Emp_JOCOL.dbo.Mov_Encomenda_Lin.intNumero = Emp_JOCOL.dbo.Mov_Encomenda_Cab.intNumero ON 
                         dbo.View_ListaArtigoEncomendado_Eticadata.StrDocEntradaERP = Emp_JOCOL.dbo.Mov_Encomenda_Cab.strNumero AND 
                         dbo.View_ListaArtigoEncomendado_Eticadata.CodArtigoERP = Emp_JOCOL.dbo.Mov_Encomenda_Lin.strCodArtigo
WHERE        (RIGHT(LEFT(dbo.View_ListaArtigoEncomendado_Eticadata.CodArtigoERP, 15), 1) = dbo.T03_Desenhos.IntIdArtigoCliente)
GO

/****** Object:  View [dbo].[View_ListaArtigosExpedicao_QtdExpedir]    Script Date: 24/02/2022 00:21:23 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

ALTER VIEW [dbo].[View_ListaArtigosExpedicao_QtdExpedir]
AS
SELECT DISTINCT 
                         CodCliente, Artigo, SUM(FltQtdExpedida) AS FltQtdExpedida, StrDocEntradaERP, IntIdExpedicao, StrDocumentoERP, IntIdArtigoCliente, IdArtigo, StrTamanho, strNumRequisicao, StrCodCor, COALESCE (strPartidaCliente, ' N/A') 
                         AS PartidaCliente, LEFT(Artigo, 20) + '-' + COALESCE (strPartidaCliente, ' N/A') + '-' + StrTamanho AS Grupo
FROM            dbo.View_ListaArtigosExpedicao
GROUP BY CodCliente, Artigo, StrDocEntradaERP, IntIdExpedicao, StrDocumentoERP, IntIdArtigoCliente, IdArtigo, StrTamanho, strNumRequisicao, StrCodCor, strPartidaCliente
GO